home *** CD-ROM | disk | FTP | other *** search
- # --------------------------------------------------------------------
- #
- # GUIDED TOUR
- #
- # --------------------------------------------------------------------
-
- # --------------------------------------------------------------------
- # Set window title
- # --------------------------------------------------------------------
- title "Guided Tour";
-
- # --------------------------------------------------------------------
- # Set escape key as way to get out
- # --------------------------------------------------------------------
- key escape exit;
-
-
- # --------------------------------------------------------------------
- # Set palette and display background bitmap
- # --------------------------------------------------------------------
-
- palette palette.bmp; # set palette
- setBackColor 0; # set background color
-
-
- # --------------------------------------------------------------------
- # Put up tableau and exit button
- # --------------------------------------------------------------------
-
- background gdtour1.bmp centerOut; # Tableau & button
- button 101 exit.bmp 459 446 exit; # exit button
- wait 750;
-
- # --------------------------------------------------------------------
- # "Welcome..."
- # --------------------------------------------------------------------
-
- [ Beginning ]
-
- wait 100;
- wave welcom1.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "This short tour will..."
- # --------------------------------------------------------------------
-
- wait 500;
- wave welcom2.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "The opening screen..."
- # --------------------------------------------------------------------
-
- wait 500;
- wave tab.wav;
- wait wave done;
-
- wait 500;
- background gdtour1a.bmp; # dim tableau
-
- # --------------------------------------------------------------------
- # "This is the Search and Table..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap search.bmp 96 245 centerOut; # search viewer
-
- wave searchvi.wav;
- wait wave done;
-
- wait 100;
- bitmap searcha.bmp 96 245; # dim search viewer
-
- # --------------------------------------------------------------------
- # "The Text window..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap text.bmp 368 34 centerOut; # text viewer
-
- wave textview.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Click on the previous and next..."
- # --------------------------------------------------------------------
-
- wait 500;
- wave prevnex.wav;
- wait wave done;
-
- wait 100;
- bitmap texta.bmp 368 34; # dim text viewer
-
- # --------------------------------------------------------------------
- # "The Media window..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap medview.bmp 96 33 centerOut; # media viewer
-
- wave medview.wav;
- wait wave done;
-
- wait 100;
- bitmap medviewa.bmp 96 33; # dim media viewer
-
- # --------------------------------------------------------------------
- # "These are the Path Bar buttons."
- # --------------------------------------------------------------------
-
- load bitmap path.bmp; # path bar
-
- wait 500;
- bitmap path.bmp 0 20 centerOut; # path bar
-
- wave path.wav;
- wait wave done;
-
- wait 500;
- bitmap patha.bmp 0 20; # dim path bar
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Use Search to see..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap searbut.bmp 1 52; # search button
-
- wave search1.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Choose "Look in" for the types..."
- # --------------------------------------------------------------------
-
- wait 500;
-
- wave search2.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Click on the Encyclopedia button..."
- # --------------------------------------------------------------------
-
- wait 500;
-
- bitmap patha.bmp 0 20; # dim path bar
- bitmap encycl.bmp 1 96; # encyclopedia button
-
- wave encycl.wav;
- wait wave done;
-
-
- # --------------------------------------------------------------------
- # "Click on the button entitled Drug..."
- # --------------------------------------------------------------------
-
- wait 500;
-
- bitmap patha.bmp 0 20; # dim path bar
- bitmap drugg.bmp 0 150; # drug guide button
-
- wave drug.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Click on the Handbook of Diseases..."
- # --------------------------------------------------------------------
-
- wait 500;
-
- bitmap patha.bmp 0 20; # dim path bar
- bitmap handb.bmp 0 200; # handbook button
-
- wave handb.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Explore a list of pictures, videos..."
- # --------------------------------------------------------------------
-
- wait 500;
-
- bitmap patha.bmp 0 20; # dim path bar
- bitmap multi.bmp 0 258; # multimedia button
-
- wave multi.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Click on the Body Atlas..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap patha.bmp 0 20; # dim path bar
- bitmap bodatlas.bmp 0 310; # atlas button
-
- wave atlas.wav;
- wait wave done;
-
-
- # --------------------------------------------------------------------
- # "Explore a list of medical..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap patha.bmp 0 20; # dim path bar
- bitmap reslst.bmp 0 362; # resource button
-
- wave resourc.wav;
- wait wave done;
-
-
- # --------------------------------------------------------------------
- # "Online connects you..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap patha.bmp 0 20; # dim pathbar
- bitmap online.bmp 0 424; # online button
-
- wave online.wav;
- wait wave done;
-
- load bitmap menu.bmp; #menubar
-
- # --------------------------------------------------------------------
- # "Additional options..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap patha.bmp 0 20; # dim path bar
- bitmap menubut.bmp 0 21; # menu button
- bitmap menu.bmp 0 0; # menu
-
- wave menu.wav;
- wait wave done;
-
- wait 500;
- background gdtour1a.bmp; # menu tableau
-
- unload bitmap patha.bmp; # dim path bar
-
- # --------------------------------------------------------------------
- # "Use the Back, Help and Exit buttons..."
- # --------------------------------------------------------------------
-
- wait 500;
- bitmap status.bmp 165 442; # status bar
-
- wave status.wav;
- wait wave done;
-
- # --------------------------------------------------------------------
- # "Now you are ready to explore..."
- # --------------------------------------------------------------------
-
- wait 500;
- background gdtour1 centerOut; # tableau
-
- wave end.wav;
- wait wave done;
-
- wait 500;
-
- # --------------------------------------------------------------------
- # Exit button lit
- # --------------------------------------------------------------------
-
- button 101 exit.bmp 460 446 exit; # exit button
- #wait 750;
-
-
- # --------------------------------------------------------------------
- # DONE !
- # --------------------------------------------------------------------
- [Exit]
- Exit;
-
-
-
-
-
-